(mm-url-load-url): Require url-parse and url-vars.

diff --git a/lisp/gnus/mm-url.el b/lisp/gnus/mm-url.el
index b24f9d4132a37794315f1c7378d0cee754696b69..22a9dbf077cb10e73c9eac3b6c7a358cfef5227b 100644 (file)
--- a/lisp/gnus/mm-url.el
+++ b/lisp/gnus/mm-url.el
@@ -276,7 +276,10 @@ This is taken from RFC 2396.")
 (defun mm-url-load-url ()
   "Load `url-insert-file-contents'."
   (unless (condition-case ()
-             (require 'url-handlers)
+             (progn
+               (require 'url-handlers)
+               (require 'url-parse)
+               (require 'url-vars))
            (error nil))
     ;; w3-4.0pre0.46 or earlier version.
     (require 'w3-vars)